learn.mb(learning.test, node = "D", method = "iamb")
learn.mb(learning.test, node = "D", method = "iamb", blacklist = c("A", "F"))
learn.nbr(gaussian.test, node = "F", method = "si.hiton.pc", whitelist = "D")
Run the code above in your browser using DataLab